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=MARABRAARAARABAARAASASLASALALAAAAASASASEAL EASES SASESASALESES ARES AREAS ESSE ERAS SS OS 


COPYRIGHT (c) 1978, 1980, 1982, 1984 BY 
DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS. 
ALL RIGHTS RESERVED. 


THIS CUFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND ores 
NLY | CCORDAN R 


,* & 
;* © 
* ® 
* & 
-* ® 
fo * 
‘2 a 
-* *® 
°e e 
;* SON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * 
;* TRANSFERRED. * 
-* * 
;* THE oo rae IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE % 
;* AND SHOULD NOT * 
* 7 
** * 
** oa 
-* ry 
** * 
** & 
** Pa 


BE CONSTRUED AS A COMMITMENT BY DIGITAi EQUIPMENT 
CORPORATION. 


DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR "pana OF ITS 
SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL 


(RR RARABARRARAARARSRAARRARRARRRRRRRRRRARARARAARRRARRRRRRRRRRRRAARRRAS RASA SAS SO | 


:++ 
; FACILITY: REMOTE 1/0 ACP 


: ABSTRACT: 
: THIS MODULE PROCESSES Q10 REQUESTS. 


; ENVIRONMENT: 
; MODE = KERNEL 
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REMO = PERFORM Q10 FUNCTION 
VOa-090 A glides ast 
Hy ~SBTTL HI 
ip ; AUTHOR: sc 
41 : MODIFIED BY: 
$09 tg i 
000 43: v02=002 DJ 
000 44: RT 
0000 «45: 


STO 
OTT G. DAVIS, CREATION DATE: 13-JUL-79 


D20 
TOR 


SrSEp= 1986 8 


01 Darrell 
IVER calls 


putty 
NETDRIV 


Eee Ree Maemo ib nage t 


5-Mar-1981 
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DECLARATIONS 


CS ee eS 


~SBTTL DECLARATIONS 


INCLUDE FILES: 


PAHAAARAAA 


; EQUATED SYMBOLS: 


B-DWPKO— CIM TN OR. DOO CIPI TWN OR. COO 
TITTOMMMNMNNNNAUNOODOOOOOOVOO 


ee eee fete lofelolololololololelololoelefeleleleq) 
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REMQIO = PERFORM Q10 FUNCTIONS 16-SEP-1984 :12:05 AX/VMS Macro Vv04-00 Page 4 R 
54-000 DECLARATIONS g- oooh Oke ARE ERem. SRCIRE EMOIO.MAR: 1 ° (1) S 
0000 8 ye -PSECT REM_CODE,NOWRT 

f° .SBTTL PROCESS ASTS ° 

0 tg p++ R 

00 4 3 R 

444 4 ; RCV_AST = process Link message received AST 2 

$0 Hi ; INPUTS: R 

444 Hf 3 R 

000 83 ; 4(AP) = Device index R 

8888 ge 3 R 

000 5 3° R 

0000 86 R 

OFFC 0000 87 RCV_AST: ~WORD nn R3,R4,R5,R6,R7,R8,R9I,R10,R11> R 

5B 04 AC 00 0002 88 MOVL AL P), et the device index R 

57 O0000'DF4B 00 0006 89 MOVL du" REMSGL _RBUFVECCR11) rR}; Get the buffer address R 
50 0000 'DF4B 7D 000C 90 MOVQ aW*REMSGL “RIOSBVECCRI14, RO’; Get the I0SB R 
04 50 Baie 4! BLBS RO,5$ 3 It LBS 1/0 was OK | . 

0015 38 ; 1/0 failed R 

0015 94 ;: R 

0015 95 38: | R 

FFE8' 30 0015 96 BSBW REMSCLEAN_UP ; Clean up the channel R 

04 bore 4 $$ RET ; Done . 

55 Q0000'DF4B 00 0019 99 MOVL aw*REMSGL_UCBVECCR11],R5 ; Get the UCB address | s 
01 12 OO1F 100 BNEQ 6$ : "If NEQ proceed U 

04 0021 101 RET ; UCB is gone | U 

0022 10 6$: | U 

EE 64 AS 04 €0 0022 10 BBS #UCBSV_ONLINE ,UCBSW_ STS(R5), 3$ ; If BC initing protocol | U 
FFD6" 30 Q027 104 BSBW REMSPROTOCOL Call the rotocol-dependent routine U 

04 002A 105 RET : Dismiss the AST : 

U 

U 

U 

U 
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REMQIO = PERFORM Q10 FUNCTIONS 16-SEP-1984 12:05 AX/VMS Macro v04-00 Page 
F5e-000 1/0 Processing g-3tr=13 4 85:12:03 ft EM. SRCJREMQIO.MAR; 1 ° 
028 107 -SBTTL 1/0 Pracessin 
et ie 
+ : uy ; REMSRECV_MSG = This routine allocates a buffer and issues a receive 
4 8 16 : INPUTS: 
028 1135; 
0028 114; R11 = device index 
002B 115; 
0028 116 3 OUTPUTS: 
002B 117; 
8° B 118; RO - LBC => failure; LBS => success 
028 119; 
0028 120 ;-- 
0028 121 
0028 1 4 REMSRECV_MSG:: 
56 O0000'DF4B DO 0028 1 MOVL @W*REMSGL_RBUFVECCR11],R6_; Get the receive buffer address 
55 0000 ' DF 48 7E 0031 124 MOVAQ a@W*REMS$GL-RIOSBVECLR114,R5 3; Get the IOSB address 
58 FFCS CF 9E 0037 125 MOVAB W*RCV_AST,R ; Set AST address 
59 0 003C¢ 166 MOVW S*#10$_READVBLK,R9 ; Function code 
5A 00000000' GF C OQO3F \§ MOVZWL G*1OC$GW_MAXBUF ,R10 ; This is the size of the read bfr 
07 «11 B0h6 : BRB COMMON_QTO ; Do the Q10 and return to caller 
0048 $6 
0048 131 
0043 13 p++ 
0048 133; 
0048 134 ; REMSSEND_MSG - send message over logical Link - no AST 
Once 13 ; REMSSEND_MSGAST - send message over logical Link = AST 
0048 137 ; INPUTS: 
0048 138; 
0048 139 ; R6 - buffer address 
0048 140; R8 - AST address (REMSSEND_MSGAST) 
0048 141; R10 - buffer Length 
0048 126 : R11 = device index 
0048 143; 
0048 144 ; OUTPUTS: 
Ones 145 ; 
004 146; RO - LBC => failure; LBS => success 
0048 147 ; 
Bote 148 ;-- 
004 149 
ok 150 REMSSEND_MSG:: 
58 D4 4 151 CLAL R8 3 No AST 
004A 13 
004A 153 REMSSEND_MSGAST:: 
55. D4 004A 154 CLRL ; No I0SB 
59 00° BO O004C 155 MOVW S*#10$_WRITEVBLK,R9 ; Function code 
004F 136 COMMON_Q10: 
57 0000'DF48 B80 Bae 15 MOV @W*REMSGL_CHANVECCR11),R7 ; Get the 1/0 channel 
055 158 : Fall through to do QI0... 
0055 159 : and return to caller 
5 160 
5 161 
5 16¢ 
0055 163 ;++ 
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164 
i 
i 
1 

if 
if 
i 
174 
i 
if 
178 
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‘f 
is 
184 
185 
186 
187 
188 
189 
190 
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194 


SSEp=198e 08:56:11 


REM$D0_Q10 = Issue Q10 


; INPUTS: 
RS - IOSB address or 0 
R6 = P1 
R7 - channel number 


; R8 AST address 
: R9 = function code 

; device index 

; OUTPUTS: 

3 RO - LBC => failure; LBS => success 


REM$DO_QI0:: 
$Q10_S CHAN= R7,- ; Issue accept or reject 
FUNC= R9,- 
10SB=  (R5),- 
ASTADR= (R8),- roe 
ASTPRM= R11,- ; Device index 
1= (R65,- 
P2= R10 


QI10_DONE : 
RSB 3; Done 


~ END 
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$$T1 = 00000000 
10 0000004F . 6 
10$_READVBLK ereetens 
10$ WRI TEVBLK eeeeenee x 8 
svessone™so songs a" 8 
AST 0000000 R 0 
REMSCLEAN UP eeeeenee =X 60 
REMSC_CURECO = 00000001 
REMSC_CURVRS = AGG 
REMSC_LNK_ READ = 00000002 
REMSC_MAXDEVS = AT 
REMSC_MAXLINKS = 00000010 
REMSC_MAXUNITS = 00000010 
EMSC_MBX_READ = 00000001 
menge-St-tou = $3999 
EMSDO_QTO ~ 00000055 RG 02 
REMSGL_CHANVEC tereneee =X 02 
REMS$GL _RBUF VEC ateenene =X 02 
RERSGL“UCBVEC. erereees OS 
REMSPROTOCOL aeeernee =X 602 
REMSSEND-ASG 0000068 Re OP 
enesine= “MSGAST 0000004  ® f: 
weaeeeene 
UCB$V_ONL INE = 00000004 
UCBSWISTS = 00000064 
fw eee cere ene eecen + 
: ; Psect synopsis ! 
PSECT name Allocation PSECT No. Attributes 
. ABS . 00000000 < 0.2 00 ¢ QO.) NOPIC  USR 
SABSS 00000000 < of 01 ¢ 1.) NOPIC USR 
REM_CODE 00000073 ¢ 115.) 02 ¢ 2.) NOPIC  USR 


o 
v 
G 
~ 
— 
3 
® 
m 
_ 
a 
vo 
vy 
@ 
a 
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~~ 
a 
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Page faults 


Initialization 39 00:00:00.06 00:00:00.39 
Command processing 107 00:00:00.60 eS ee 
Pass 270 Bp 88: 9-96 eS Be .10 
Symbol table sort 8 0:00:01.1 BHP Ot «Be 
Pass 2 5 Ba 28: 4-51 BR? 88 706 «8 
Symbol table output 5 8 Ba BO 5 88:88:38 .05 
Psect synopsis output 8:08: 0.03 838 :00.03 
Cross-reference output : 4 +00 :99 -99 
Assembler run totals 46 0:00:09.98 0:00:22. 


The working set Limit was 1350 pages. 


CON ABS LCL NOSHR NOEXE 
CON ABS LCL NOSHR- EXE 
CON REL LCL NOSHR- EXE 


NORD ae NOVEC BYTE 
RD WRT NOVEC BYTE 
RD NOURT NOVEC BYTE 


L 10 
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VAX-11 Macro Run Statistics -SEP-1984 4:11 


36963 bytes (73 pages) of virtual memory were used to buffer the intermediate code. 

There were 40 pages of symbol table space allocated to hold 720 non-local = local symbols. 
194 source Lines were read in Pass 1, producing 15 object records in Pass 

20 pages of virtual memory were used to define 19 macros. 


Sees ewe oe eee teem emma em ee an} 


Macro Library name Macros defined 


-§ 22 SDUAcs :CREM.OBJJREM.MLB; 1 1 

$S22$0UACE SYS.OBJJLIB.MLB;1 8 
“$255 SDUADB: SYSLIBISTARLET. MLB; 2 7 
TOTALS (all Libraries) 16 


844 GETS were required to define 16 macros. 


There were no errors, warnings or information messages. 
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